y <- matrix(1:20, nrow = 4, ncol = 4)
print(y)
mat_row <- matrix(1:10, nrow = 2)
print(mat_row)